home *** CD-ROM | disk | FTP | other *** search
/ Power Programmierung 2 / Power-Programmierung CD 2 (Tewi)(1994).iso / c / library / os2 / rb3774 / record / add.cmd next >
Encoding:
Text File  |  1992-06-28  |  833 b   |  33 lines
  1. /*  */
  2. Call RxFuncadd 'SysLoadFuncs', 'RexxUtil', 'SysLoadFuncs'
  3. Call SysLoadFuncs
  4.  
  5. '@echo off'
  6.  
  7. 'copy names.dat c:\names.dat 1>nul: 2>nul:'
  8. 'copy server.exe \os2 1>nul: 2>nul:'
  9. 'copy record.dll \os2\dll 1>nul: 2>nul:'
  10. 'copy recflder.dll \os2\dll 1>nul: 2>nul:'
  11.  
  12. RetCode = SysRegisterObjectClass( "Record", "record")
  13.  
  14. if RetCode then
  15.    say 'Record Class registered'
  16. else do
  17.    say 'Error Record Class failed to register'
  18.    /* Remove false entry */
  19.    RetCode = SysDeregisterObjectClass( "Record");
  20.    exit(1)
  21.    end
  22.  
  23. RetCode = SysRegisterObjectClass( "RecordFolder", "recflder")
  24.  
  25. if RetCode then
  26.    say 'RecordFolder Class registered'
  27. else do
  28.    say 'Error RecordFolder Class failed to register'
  29.    /* Remove false entry */
  30.    RetCode = SysDeregisterObjectClass( "RecordFolder");
  31.    exit(1)
  32.    end
  33.